if clipper
               save screen to entryscr
            endif
            clear
            run dir/w *.lbl
            wait
            if clipper
               restore screen from entryscr
            endif